inherited frmCadClientes: TfrmCadClientes
  Width = 693
  Height = 415
  Caption = 'Cadastro de Clientes'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited fcStatusBar1: TfcStatusBar
    Top = 361
    Width = 685
  end
  inherited PageControl1: TPageControl
    Width = 685
    Height = 361
    ActivePage = TabSheet2
    inherited TabSheet1: TTabSheet
      inherited wwDBNavigator1: TwwDBNavigator
        Top = 272
        Width = 677
        inherited wwDBNavigator1First: TwwNavButton
          Width = 169
        end
        inherited wwDBNavigator1Prior: TwwNavButton
          Left = 170
          Width = 169
        end
        inherited wwDBNavigator1Next: TwwNavButton
          Left = 339
          Width = 169
        end
        inherited wwDBNavigator1Last: TwwNavButton
          Left = 508
          Width = 168
        end
      end
      inherited wwDBGrid1: TwwDBGrid
        Width = 677
        Height = 272
        ControlType.Strings = (
          'STATUS;CheckBox;1;0')
        Selected.Strings = (
          'ID_CLIENTE'#9'7'#9'C'#243'digo'#9'F'
          'COD_CLIENTE_TQS'#9'7'#9'C'#243'digo TQS'#9'F'
          'ID_FILIAL'#9'10'#9'Filial'#9'F'
          'RAZAO_SOCIAL'#9'40'#9'Raz'#227'o Social'#9'F'
          'CNPJ'#9'16'#9'CNPJ'#9#9
          'EMAIL'#9'60'#9'e-mail'#9'F'
          'CONTATO'#9'60'#9'Contato'#9#9
          'DT_CADASTRO'#9'10'#9'Data Cadastro'#9'F'
          'DT_ALTERACAO'#9'10'#9'Data Altera'#231#227'o'#9'F'
          'STATUS'#9'10'#9'Status'#9'F')
        UseTFields = False
      end
      inherited Panel2: TPanel
        Top = 290
        Width = 677
      end
    end
    inherited TabSheet2: TTabSheet
      object Label4: TLabel [1]
        Left = 133
        Top = 40
        Width = 58
        Height = 13
        Caption = 'C'#243'digo TQS'
        FocusControl = DBEdit2
      end
      object Label9: TLabel [2]
        Left = 6
        Top = 80
        Width = 63
        Height = 13
        Caption = 'Raz'#227'o Social'
        FocusControl = DBEdit3
      end
      object Label10: TLabel [3]
        Left = 339
        Top = 80
        Width = 40
        Height = 13
        Caption = 'Fantasia'
        FocusControl = DBEdit4
      end
      object Label11: TLabel [4]
        Left = 6
        Top = 120
        Width = 27
        Height = 13
        Caption = 'CNPJ'
        FocusControl = DBEdit5
      end
      object Label12: TLabel [5]
        Left = 173
        Top = 120
        Width = 70
        Height = 13
        Caption = 'Inscr. Estadual'
        FocusControl = DBEdit6
      end
      object Label13: TLabel [6]
        Left = 339
        Top = 120
        Width = 37
        Height = 13
        Caption = 'Contato'
        FocusControl = DBEdit7
      end
      object Label14: TLabel [7]
        Left = 5
        Top = 160
        Width = 27
        Height = 13
        Caption = 'e-mail'
        FocusControl = DBEdit8
      end
      object Label15: TLabel [8]
        Left = 330
        Top = 160
        Width = 42
        Height = 13
        Caption = 'Telefone'
        FocusControl = DBEdit9
      end
      object Label16: TLabel [9]
        Left = 446
        Top = 160
        Width = 17
        Height = 13
        Caption = 'Fax'
        FocusControl = DBEdit10
      end
      object Label17: TLabel [10]
        Left = 562
        Top = 160
        Width = 32
        Height = 13
        Caption = 'Celular'
        FocusControl = DBEdit11
      end
      object Label21: TLabel [11]
        Left = 261
        Top = 40
        Width = 20
        Height = 13
        Caption = 'Filial'
        FocusControl = DBEdit18
      end
      inherited Panel1: TPanel
        Width = 677
        TabOrder = 12
        inherited BitBtn6: TBitBtn
          Left = 589
        end
        object BitBtn9: TBitBtn
          Left = 464
          Top = 1
          Width = 75
          Height = 36
          Action = act_GeraChave
          Caption = 'Gerar Chave'
          TabOrder = 6
        end
      end
      inherited DBEdit1: TDBEdit
        DataField = 'ID_CLIENTE'
        TabOrder = 13
      end
      inherited wwCheckBox1: TwwCheckBox
        Left = 202
        TabOrder = 14
      end
      object DBEdit2: TDBEdit
        Left = 133
        Top = 56
        Width = 120
        Height = 21
        DataField = 'COD_CLIENTE_TQS'
        DataSource = dts_Cadastros
        TabOrder = 0
      end
      object DBEdit3: TDBEdit
        Left = 6
        Top = 96
        Width = 327
        Height = 21
        CharCase = ecUpperCase
        DataField = 'RAZAO_SOCIAL'
        DataSource = dts_Cadastros
        TabOrder = 2
      end
      object DBEdit4: TDBEdit
        Left = 339
        Top = 96
        Width = 333
        Height = 21
        CharCase = ecUpperCase
        DataField = 'FANTASIA'
        DataSource = dts_Cadastros
        TabOrder = 3
      end
      object DBEdit5: TDBEdit
        Left = 6
        Top = 136
        Width = 160
        Height = 21
        DataField = 'CNPJ'
        DataSource = dts_Cadastros
        TabOrder = 4
      end
      object DBEdit6: TDBEdit
        Left = 173
        Top = 136
        Width = 160
        Height = 21
        DataField = 'INSCR_EST'
        DataSource = dts_Cadastros
        TabOrder = 5
      end
      object DBEdit7: TDBEdit
        Left = 339
        Top = 136
        Width = 333
        Height = 21
        CharCase = ecUpperCase
        DataField = 'CONTATO'
        DataSource = dts_Cadastros
        TabOrder = 6
      end
      object GroupBox1: TGroupBox
        Left = 0
        Top = 198
        Width = 673
        Height = 131
        Caption = 'Endere'#231'o'
        TabOrder = 11
        object Label19: TLabel
          Left = 403
          Top = 7
          Width = 32
          Height = 13
          Caption = 'Compl.'
          FocusControl = DBEdit13
        end
        object Label18: TLabel
          Left = 8
          Top = 48
          Width = 27
          Height = 13
          Caption = 'Bairro'
          FocusControl = DBEdit14
        end
        object Label20: TLabel
          Left = 8
          Top = 88
          Width = 38
          Height = 13
          Cursor = crHandPoint
          Caption = 'Cidades'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = act_Consulta_CidadeExecute
        end
        object DBEdit12: TDBEdit
          Left = 8
          Top = 23
          Width = 390
          Height = 21
          CharCase = ecUpperCase
          DataField = 'ENDERECO'
          DataSource = dts_Cadastros
          TabOrder = 0
        end
        object DBEdit13: TDBEdit
          Left = 403
          Top = 23
          Width = 264
          Height = 21
          CharCase = ecUpperCase
          DataField = 'COMPL'
          DataSource = dts_Cadastros
          TabOrder = 1
        end
        object DBEdit14: TDBEdit
          Left = 8
          Top = 64
          Width = 658
          Height = 21
          CharCase = ecUpperCase
          DataField = 'BAIRRO'
          DataSource = dts_Cadastros
          TabOrder = 2
        end
        object DBEdit15: TDBEdit
          Left = 8
          Top = 104
          Width = 73
          Height = 21
          DataField = 'ID_CIDADE'
          DataSource = dts_Cadastros
          TabOrder = 3
        end
        object DBEdit16: TDBEdit
          Left = 80
          Top = 104
          Width = 534
          Height = 21
          TabStop = False
          Color = clSkyBlue
          DataField = 'CIDADE'
          DataSource = dts_Cadastros
          ReadOnly = True
          TabOrder = 4
        end
        object DBEdit17: TDBEdit
          Left = 620
          Top = 104
          Width = 47
          Height = 21
          TabStop = False
          Color = clSkyBlue
          DataField = 'UF'
          DataSource = dts_Cadastros
          ReadOnly = True
          TabOrder = 5
        end
      end
      object DBEdit8: TDBEdit
        Left = 6
        Top = 176
        Width = 318
        Height = 21
        CharCase = ecLowerCase
        DataField = 'EMAIL'
        DataSource = dts_Cadastros
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
        TabOrder = 7
      end
      object DBEdit9: TDBEdit
        Left = 330
        Top = 176
        Width = 110
        Height = 21
        DataField = 'TELEFONE'
        DataSource = dts_Cadastros
        TabOrder = 8
      end
      object DBEdit10: TDBEdit
        Left = 446
        Top = 176
        Width = 110
        Height = 21
        DataField = 'FAX'
        DataSource = dts_Cadastros
        TabOrder = 9
      end
      object DBEdit11: TDBEdit
        Left = 562
        Top = 176
        Width = 110
        Height = 21
        DataField = 'CELULAR'
        DataSource = dts_Cadastros
        TabOrder = 10
      end
      object Panel3: TPanel
        Left = 521
        Top = 39
        Width = 155
        Height = 42
        Anchors = [akTop, akRight]
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 15
        object Label5: TLabel
          Left = 4
          Top = 4
          Width = 72
          Height = 13
          AutoSize = False
          Caption = 'Data Cadastro'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label6: TLabel
          Left = 4
          Top = 25
          Width = 72
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Data Altera'#231#227'o'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object DBText1: TDBText
          Left = 80
          Top = 4
          Width = 50
          Height = 13
          AutoSize = True
          DataField = 'DT_CADASTRO'
          DataSource = dts_Cadastros
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object DBText2: TDBText
          Left = 80
          Top = 24
          Width = 50
          Height = 13
          AutoSize = True
          DataField = 'DT_ALTERACAO'
          DataSource = dts_Cadastros
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
      end
      object Panel4: TPanel
        Left = 81
        Top = 303
        Width = 592
        Height = 241
        TabOrder = 16
        Visible = False
        object Label7: TLabel
          Left = 5
          Top = 7
          Width = 92
          Height = 13
          Caption = 'Campo de Consulta'
        end
        object Label8: TLabel
          Left = 120
          Top = 7
          Width = 79
          Height = 13
          Caption = 'Digite a consulta'
        end
        object wwDBGrid2: TwwDBGrid
          Left = 5
          Top = 46
          Width = 500
          Height = 191
          Selected.Strings = (
            'ID_CIDADE'#9'10'#9'C'#243'digo'
            'CIDADE'#9'60'#9'Cidade'
            'UF'#9'2'#9'UF')
          IniAttributes.Delimiter = ';;'
          TitleColor = clBtnFace
          FixedCols = 0
          ShowHorzScrollBar = True
          DataSource = dts_Cidades
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
          TabOrder = 3
          TitleAlignment = taLeftJustify
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          TitleLines = 1
          TitleButtons = False
          UseTFields = False
          PaintOptions.AlternatingRowColor = clSkyBlue
        end
        object wwDBComboBox2: TwwDBComboBox
          Left = 5
          Top = 21
          Width = 114
          Height = 21
          ShowButton = True
          Style = csDropDown
          MapList = True
          AllowClearKey = False
          DropDownCount = 8
          ItemHeight = 0
          Sorted = False
          TabOrder = 0
          UnboundDataType = wwDefault
          OnCloseUp = wwDBComboBox2CloseUp
        end
        object wwIncrementalSearch2: TwwIncrementalSearch
          Left = 119
          Top = 21
          Width = 386
          Height = 21
          DataSource = dts_Cidades
          ShowMatchText = True
          CharCase = ecUpperCase
          TabOrder = 1
        end
        object BitBtn7: TBitBtn
          Left = 508
          Top = 20
          Width = 77
          Height = 25
          Action = act_ConfirmaCidade
          Caption = '&OK'
          TabOrder = 2
        end
        object BitBtn8: TBitBtn
          Left = 509
          Top = 48
          Width = 75
          Height = 25
          Action = act_CancelarCidade
          Caption = '&Cancelar'
          TabOrder = 4
        end
      end
      object DBEdit18: TDBEdit
        Left = 261
        Top = 56
        Width = 120
        Height = 21
        DataField = 'ID_FILIAL'
        DataSource = dts_Cadastros
        TabOrder = 1
      end
      object wwCheckBox2: TwwCheckBox
        Left = 385
        Top = 59
        Width = 88
        Height = 17
        DisableThemes = False
        AlwaysTransparent = False
        ValueChecked = '1'
        ValueUnchecked = '0'
        DisplayValueChecked = '1'
        DisplayValueUnchecked = '0'
        NullAndBlankState = cbUnchecked
        Caption = 'Usa Hardlock'
        DataField = 'HAS_HD'
        DataSource = dts_Cadastros
        TabOrder = 17
      end
    end
  end
  inherited ActionList1: TActionList
    Left = 296
    Top = 8
    object act_Consulta_Cidade: TAction
      Caption = 'act_Consulta_Cidade'
      OnExecute = act_Consulta_CidadeExecute
      OnUpdate = act_Consulta_CidadeUpdate
    end
    object act_ConfirmaCidade: TAction
      Caption = '&OK'
      OnExecute = act_ConfirmaCidadeExecute
    end
    object act_CancelarCidade: TAction
      Caption = '&Cancelar'
      OnExecute = act_CancelarCidadeExecute
    end
    object act_GeraChave: TAction
      Caption = 'Gerar Chave'
      OnExecute = act_GeraChaveExecute
    end
  end
  inherited dts_Cadastros: TDataSource
    DataSet = dmMain.cds_Clientes
    Left = 68
    Top = 80
  end
  object dts_Cidades: TDataSource
    DataSet = dmMain.cds_Cidades
    Left = 284
    Top = 152
  end
end
